home *** CD-ROM | disk | FTP | other *** search
/ Gamers Delight 2 / Gamers Delight 2.iso / Aminet / game / think / MADgic41.lzh / 1990 / Lightning.s < prev    next >
Text File  |  1992-03-10  |  797b  |  29 lines
  1. ;
  2. ;    Warrior: Lightning
  3. ;  File name: lightnin.red
  4. ; Tournament: ICWST'90
  5. ;   Standard: CWS'88
  6. ;     Author: C. Butcher / New Zealand
  7. ;
  8. num       dat  # 0
  9. start     spl    copy
  10.           cmp  # 0          @ a       ; was CMP @ a  # 0 - CWS'88 violation - WRB/ICWS.DO
  11.           jmp    bomb
  12.           add  # 5            a
  13.           jmp    start+1
  14. bomb      mov  # 20           bombnum
  15.           sub  # 10           a
  16.           mov  # 0          < a
  17.           djn   -1            bombnum
  18.           add  # 20           a
  19.           jmp    start+1
  20. a         dat  # 10
  21. address   dat  #-833
  22. copy      mov  # 20           num
  23.           mov  @ num        < address
  24.           djn   -1            num
  25.           spl  @ address
  26.           sub  # 653          address
  27. bombnum   dat  # 0
  28.           end    start
  29.